Public Class GestorAsistencia
    Public Sub registrarAusencia(ByVal pidGrupo As Integer, ByVal pidEstudiante As Integer, ByVal pdate As Date)
        MultiAsistencia.registrarAusencia(pidGrupo, pidEstudiante, pdate)
    End Sub

    Public Function LevantarAusencias(ByVal pidEstudiante As String) As DataTable
        Dim listaAusencias As DataTable = MultiAsistencia.LevantarAusencias(pidEstudiante)

        If (listaAusencias Is Nothing) Then
            Return Nothing
        End If
        Return listaAusencias
    End Function

    Public Sub ModificarAusencia(ByVal pestaJustificada As Boolean, ByVal pmotivo As String, ByVal pid As Integer)
        MultiAsistencia.ModificarAusencia(pestaJustificada, pmotivo, pid)

    End Sub
End Class
